home *** CD-ROM | disk | FTP | other *** search
MS Visual FoxPro App | 1998-05-26 | 25.2 KB | 637 lines |
- Doc Wizard Output Folder?
- fdxref.dbf
- files.dbf
- You must supply the name of the Documenting Wizard target directory.
- fdxref
- fdxref
- symbol
- symbols
- fdxref
- symbols
- FDXREF
- SYMBOL
- COUNT
- SYMBOLS
- JUMP'
- symbol
- .VCX.SCX.DBC
- snipfile
- snipfile.
- fdstack[1]b
- _screen.activeform.captionb
- You must activate an edit window first.
- MWINNAME
- MWINPOS
- SEEKMODE
- SYMBOL
- FDXREF
- SETLIBR
- FILENAME
- SNIPFILE
- SNIPRECNO
- SNIPFLD
- GOTOREC
- FDSTACK
- CURPOS
- EXAMINE
- EXAMu
- orderv
- symbol
- not found
- .VCX.SCX.DBC
- snipfile
- snipfile.
- PRG MPR SPR
- found in
- FDXREF
- SEEKMODE
- SYMBOL
- FILENAME
- SNIPFILE
- SNIPRECNO
- SNIPFLD
- LINENO
- FDSTACK
- MWINNAME
- MWINPOS
- GOTOREC
- fd3fll\fd3.fll0
- fd3fll\fd3.fll
- wizards\fd3.fll
- LIBRv
- files
- files
- procname
- symbol
- m.err=.t.
- classes
- fdxref
- NMODE
- STYLE
- CLEAR
- FILES
- FDXREF
- MVAR1
- MVAR2
- ALLOWDUP
- VISIBLE
- TREEDIAG
- CLASSES
- PROCNAME
- DISTINCT
- MYREC
- SHOWIT
- CLASSDIAG
- LISTCOUNT
- HASSUBITEMS
- PICTURETYPE
- MFILE
- collatev
- machine
- fdxref
- classd1
- classd1&
- classd
- dprocname
- symbol
- CCOLLATE
- SYMBOL
- PROCNAME
- FILENAME
- FDXREF
- CLASSD1
- CLASSD
- DPROCNAME
- ADDITEM
- INDENT
- SHOWCLASv
- classd
- dprocname
- procname
- procname
- PROCNAME
- MPARENT
- ADDITEM
- SYMBOL
- INDENT
- SHOWCLAS
- exactv
- PROCEDURE
- procedure
- fdxref
- symbol
- set exact &msetexact
- MINDENT
- MPARENT
- CACTIONCHARS
- TRACK
- MTOP
- MSETEXACT
- FDXREF
- SYMBOL
- FILES
- PROCNAME
- FLAG
- PROCEDURE
- ADDITEM
- INDENT
- SHOWIT
- Recursion
- PROCNAME
- MPARENT
- ADDITEM
- SYMBOL
- INDENT
- TRACK
- SHOWIT
- FDXREF
- setlibr
- JustStemM
- ClassDiag
- showclaso
- treediag7
- showit
- gotorec/
- curpos6
- examine=
- PLATFORM
- UNIQUEID
- TIMESTAMP
- CLASS
- CLASSLOC
- BASECLASS
- OBJNAME
- PARENT
- PROPERTIES
- PROTECTED
- METHODS
- OBJCODE
- RESERVED1
- RESERVED2
- RESERVED3
- RESERVED4
- RESERVED5
- RESERVED6
- RESERVED7
- RESERVED8
- COMMENT Screen
- WINDOWS _R040MTX38 578984160
- WINDOWS _QWK0MM2GR 612990831
- WINDOWS _R040MTX38 612990831
- WINDOWS _QWK0MM2GR 579305984
- WINDOWS _QWK0MM2H0 579306050
- WINDOWS _QWK0MM2HK 579306050
- WINDOWS _R040MTX38 612990831)
- WINDOWS _QWK0MM2IF 579305808
- WINDOWS _QWK0MM2IZ 612990831k
- WINDOWS _QWK0MTO26 578984396-
- WINDOWS _QWK0MTO27 612990831
- WINDOWS _QWK0MTO2G 578984396j
- WINDOWS _QWK0MTO2H 612990831
- WINDOWS _QWK0MTO2Q 578984397
- WINDOWS _QWK0MTO2R 612990831R
- WINDOWS _QWK0MTO30 579305984
- WINDOWS _QWK0MTO3A 579306050
- WINDOWS _RJF14Z3WW 5793058080"
- WINDOWS _RJK0YV6J3 579306050
- COMMENT RESERVED
- VERSION = 3.00
- dataenvironment
- dataenvironment
- Dataenvironment
- JLeft = 1
- Top = 220
- Width = 520
- Height = 200
- Name = "Dataenvironment"
- Form1
- DataSession = 1
- ScaleMode = 3
- Height = 380
- Width = 607
- DoCreate = .T.
- AutoCenter = .T.
- BorderStyle = 1
- Caption = "Code Analyzer"
- MaxButton = .F.
- ForeColor = 0,0,0
- Name = "Form1"
- PROCEDURE Destroy
- pop menu _msysmenu
- IF USED("files")
- USE IN files
- ENDIF
- IF USED("symbols")
- USE IN symbols
- ENDIF
- IF USED("fdxref")
- USE IN fdxref
- ENDIF
- IF USED("snipfile")
- USE IN snipfile
- ENDIF
- ENDPROC
- PROCEDURE Init
- PUBLIC m.symbol
- push menu _msysmenu
- DO jump.mpr
- m.symbol=""
- this.pageframe1.page1.list1.selected(1)=.t.
- ENDPROC
- PROCEDURE Load
- set exact off
- set conf on
- CLOSE DATA
- IF !USED("fdxref")
- use (mdir+"fdxref") again excl
- ENDIF
- select fdxref
- set order to symbol
- IF !USED("symbols")
- SELECT upper(symbol) as symbol,count(*) as count ;
- FROM fdxref INTO CURSOR symbols order by 1 group by 1
- ENDIF
- SELECT symbols
- LOCATE
- this.caption=this.caption+' - '+mdir
- ENDPROC
- THISFORM
- RELEASE
- Click,
- symbol
- analyzer
- THISFORM
- PAGEFRAME1
- PAGE2
- VALUE
- FDXREF
- SYMBOL
- LIST
- LISTINDEX
- ANALYZER9
- LISTINDEX
- HASSUBITEMS
- PICTURETYPE9
- LISTINDEX
- HASSUBITEMS
- PICTURETYPE
- Click,
- Collapse
- Expand`
- Form1
- pageframe
- pageframe
- pageframe1
- Form1
- ErasePage = .T.
- PageCount = 2
- TabStyle = 1
- Top = 2
- Left = 0
- Width = 607
- Height = 378
- Name = "pageframe1"
- Page1.FontName = "Tahoma"
- Page1.Caption = "\<Symbols"
- Page1.Name = "page1"
- Page2.FontName = "Tahoma"
- Page2.Caption = "\<Hierarchies"
- Page2.Name = "page2"
- TPROCEDURE page1.Activate
- set order to symbol in fdxref
- SELECT symbols
- ENDPROC
- analyzer
- ANALYZER
- Click,
- Command1
- listbox
- listbox
- list1
- Form1.pageframe1.page1
- FontName = "Tahoma"
- FontSize = 9
- ColumnCount = 2
- ColumnWidths = "230,50"
- RowSourceType = 2
- RowSource = "LEFT(symbol,30),str(count,5)"
- Height = 133
- Left = 16
- NumberOfElements = 0
- TabIndex = 1
- Top = 6
- Width = 313
- IntegralHeight = .T.
- Name = "list1"
- /PROCEDURE GotFocus
- select symbols
- ENDPROC
- SYMBOLS
- GotFocus,
- commandbutton
- commandbutton
- cmdGoto
- Form1.pageframe1.page1
- xTop = 20
- Left = 431
- Height = 23
- Width = 72
- FontName = "Tahoma"
- Caption = "\<Goto"
- TabIndex = 4
- Name = "cmdGoto"
- JPROCEDURE Click
- DO tex in analyzer with 'G'
- select symbols
- ENDPROC
- analyzer
- ANALYZER
- SYMBOLS
- Click,
- commandbutton
- commandbutton
- cmdNext
- Form1.pageframe1.page1
- xTop = 44
- Left = 431
- Height = 23
- Width = 72
- FontName = "Tahoma"
- Caption = "\<Next"
- TabIndex = 5
- Name = "cmdNext"
- JPROCEDURE Click
- DO tex in analyzer with 'N'
- select symbols
- ENDPROC
- analyzer
- ANALYZER
- SYMBOLS
- Click,
- grid1
- Form1.pageframe1.page1
- UColumnCount = 4
- FontName = "Tahoma"
- ChildOrder = "symbol"
- DeleteMark = .F.
- Height = 181
- Left = 2
- LinkMaster = "symbols"
- Panel = 1
- ReadOnly = .T.
- RecordSource = "fdxref"
- RelationalExpr = "upper(symbol)"
- TabIndex = 3
- Top = 161
- Width = 598
- Name = "grid1"
- Column1.FontName = "Tahoma"
- Column1.ControlSource = "fdxref.procname"
- Column1.Width = 175
- Column1.ReadOnly = .T.
- Column1.Name = "column1"
- Column2.FontName = "Tahoma"
- Column2.ControlSource = "fdxref.lineno"
- Column2.Width = 38
- Column2.ReadOnly = .T.
- Column2.Name = "column2"
- Column3.FontName = "Tahoma"
- Column3.FontSize = 9
- Column3.ControlSource = "fdxref.filename"
- Column3.Width = 310
- Column3.ReadOnly = .T.
- Column3.Name = "column3"
- Column4.FontName = "Tahoma"
- Column4.ControlSource = "fdxref.flag"
- Column4.Width = 34
- Column4.ReadOnly = .T.
- Column4.Name = "column4"
- header
- header
- header1
- $Form1.pageframe1.page1.grid1.column1
- CFontName = "Tahoma"
- Caption = "Procedure Name"
- Name = "header1"
- textbox
- textbox
- text1
- $Form1.pageframe1.page1.grid1.column1
- FFontName = "Tahoma"
- BorderStyle = 0
- ReadOnly = .T.
- Name = "text1"
- 8PROCEDURE Click
- DO tex in analyzer with 'G'
- ENDPROC
- CArial, 0, 9, 5, 15, 12, 21, 3, 0
- Tahoma, 0, 9, 5, 14, 12, 23, 2, 0
- ,PROCEDURE Click
- thisform.release
- ENDPROC
- commandbutton
- commandbutton
- ,OLEObject = C:\WINNT\System32\MSOUTL32.OCX
- header
- header
- header1
- $Form1.pageframe1.page1.grid1.column2
- 9FontName = "Tahoma"
- Caption = "Line"
- Name = "header1"
- textbox
- textbox
- text1
- $Form1.pageframe1.page1.grid1.column2
- FFontName = "Tahoma"
- BorderStyle = 0
- ReadOnly = .T.
- Name = "text1"
- header
- header
- header1
- $Form1.pageframe1.page1.grid1.column3
- >FontName = "Tahoma"
- Caption = "File Name"
- Name = "header1"
- textbox
- textbox
- text1
- $Form1.pageframe1.page1.grid1.column3
- TFontName = "Tahoma"
- FontSize = 9
- BorderStyle = 0
- ReadOnly = .T.
- Name = "text1"
- header
- header
- header1
- $Form1.pageframe1.page1.grid1.column4
- 9FontName = "Tahoma"
- Caption = "Flag"
- Name = "header1"
- textbox
- textbox
- text1
- $Form1.pageframe1.page1.grid1.column4
- FFontName = "Tahoma"
- BorderStyle = 0
- ReadOnly = .T.
- Name = "text1"
- label
- label
- Label1
- Form1.pageframe1.page1
- AutoSize = .T.
- FontName = "Tahoma"
- BackStyle = 0
- Caption = "Click on a Procedure Name to View Source:"
- Height = 16
- Left = 14
- Top = 146
- Width = 241
- TabIndex = 2
- Name = "Label1"
- optiongroup
- optiongroup
- Form1.pageframe1.page2
- ButtonCount = 2
- BackStyle = 0
- Value = 0
- Height = 48
- Left = 431
- Top = 12
- Width = 125
- Name = "opt"
- Option1.BackStyle = 0
- Option1.Caption = "Calling \<Tree"
- Option1.Value = 0
- Option1.Height = 18
- Option1.Left = 5
- Option1.Top = 5
- Option1.Width = 104
- Option1.Name = "option1"
- Option2.BackStyle = 0
- Option2.Caption = "Class \<Diagram"
- Option2.Value = 0
- Option2.Height = 18
- Option2.Left = 5
- Option2.Top = 25
- Option2.Width = 104
- Option2.Name = "option2"
- PROCEDURE InteractiveChange
- do tre in analyzer with this.value,this.parent.ol
- ENDPROC
- PROCEDURE ProgrammaticChange
- this.interactiveChange
- ENDPROC
- analyzer
- ANALYZER
- VALUE
- PARENT
- INTERACTIVECHANGE
- InteractiveChange,
- ProgrammaticChange
- olecontrol
- olecontrol
- Form1.pageframe1.page2
- =Top = 12
- Left = 26
- Height = 296
- Width = 357
- Name = "ol"
- PROCEDURE Click
- *** OLE Control Event ***
- IF thisform.pageframe1.page2.opt.value=1
- SELECT fdxref
- SET ORDER TO symbol
- SEEK UPPER(this.list[this.listindex])
- do tex in analyzer with 'G'
- ENDIF
- ENDPROC
- PROCEDURE Collapse
- *** OLE Control Event ***
- Parameters listindex
- IF this.HasSubitems[listindex]
- this.PictureType[Listindex]=0
- ENDIF
- ENDPROC
- PROCEDURE Expand
- *** OLE Control Event ***
- Parameters listindex
- IF this.HasSubitems[listindex]
- this.PictureType[Listindex]=1
- ENDIF
- ENDPROC
- symbol
- SYMBOL
- FDXREF
- SYMBOLS
- page1.Activate,
- Top = 96
- Left = 432
- Height = 23
- Width = 72
- FontName = "Tahoma"
- Cancel = .T.
- Caption = "\<Close"
- TabIndex = 6
- Name = "Command1"
- 75E05FE0-59D6-101B-A3C9-08002B2F49FB
- Tahoma
- MousePointer
- files
- symbols
- fdxref
- snipfile
- FILES
- SYMBOLS
- FDXREF
- SNIPFILEN
- jump.mpr
- SYMBOL
- PAGEFRAME1
- PAGE1
- LIST1
- SELECTED
- fdxref
- fdxref
- symbol
- symbols
- fdxref
- symbols
- FDXREF
- SYMBOL
- COUNT
- SYMBOLS
- CAPTION
- Destroy,
- Loadq
- \<Analyzer
- ALT+A
- Go to \<Definition
- CTRL+D
- Ctrl+D
- Go to \<Reference
- CTRL+R
- Ctrl+R
- Go to \<Next
- CTRL+N
- Ctrl+N
- Go \<Back
- CTRL+B
- Ctrl+B
- do tex in analyzer with "D"
- do tex in analyzer with "R"
- do tex in analyzer with "N"
- do tex in analyzer with "B"
- _RV31BT0F2
- ANALYZER
- analyzer.prg
- d:\8146\fox60\dev\
- analyzer.fxp
- jump.scx
- jump.sct
- jump.mpr
- jump.mpx
-